На вход подаются три числа: целое число N (> 1) и вещественные числа A и D – соответственно первый член и знаменатель геометрической прогрессии (каждое число вводится с новой строки). Сформировать и вывести массив размера N, содержащий N первых членов данной прогрессии: A, A·D, A·D2, A·D3, … . Каждое число выводить на новой строке.
uses PT4Exam;
const R = 100;
var
m: array[1..R] of real;
n, i: integer;
a, d: real;
begin
Task('ExamBegin21');